;; import numbers/std-numbers.scm numbers/binary.scm

(print (to-binary 341512))
(print '(1 0 1 0 0 1 1 0 1 1 0 0 0 0 0 1 0 0 0))
